home *** CD-ROM | disk | FTP | other *** search
/ Ahoy 1987 August / Ahoy_Magazine_87-08_1987_Double_L_Side_A.d64 / Route 64 (.txt) < prev    next >
Commodore BASIC  |  2022-10-26  |  4KB  |  81 lines
  1. 10 rem *** route 64 *** buck childress ***
  2. 20 rem *** p.o. box 13575 salem, or 97309 ***
  3. 30 printchr$(147)"loading";:j=52000
  4. 40 print".";:forb=0to11:reada
  5. 50 ifa<0ora>255then70
  6. 60 pokej+b,a:x=x+a:d=d+1:nextb:reada:ifa=xthen80
  7. 70 print:print:print"error in data line:"peek(64)*256+peek(63):end
  8. 80 x=0:j=j+12:ifd<840then40
  9. 90 print:print:print"the data is ok...":print
  10. 100 print"sys 52000 to activate...":end
  11. 110 data169,0,141,102,206,165,43,166,44,133,251,133,1553
  12. 120 data253,134,252,134,254,32,225,255,240,71,32,208,2090
  13. 130 data205,140,103,206,140,104,206,140,105,206,140,106,1801
  14. 140 data206,140,108,206,32,163,205,208,49,173,102,206,1798
  15. 150 data208,43,238,102,206,169,38,160,206,32,30,171,1603
  16. 160 data169,0,133,198,133,204,165,203,201,63,240,11,1720
  17. 170 data201,25,240,4,201,39,208,242,32,210,255,133,1790
  18. 180 data204,162,0,134,207,201,25,240,168,96,32,171,1640
  19. 190 data205,177,251,170,32,171,205,177,251,32,205,189,2065
  20. 200 data169,32,32,210,255,173,102,206,240,10,32,163,1624
  21. 210 data205,201,39,240,50,76,5,204,32,163,205,240,1660
  22. 220 data91,142,109,206,72,32,77,205,104,166,212,208,1624
  23. 230 data239,201,39,240,18,201,137,240,8,201,141,240,1905
  24. 240 data4,201,167,208,223,141,108,206,76,160,203,174,1871
  25. 250 data108,206,240,212,141,104,206,141,109,206,141,112,1926
  26. 260 data206,169,0,141,99,206,32,163,205,208,3,76,1508
  27. 270 data104,204,201,34,240,249,32,77,205,174,105,206,1831
  28. 280 data208,241,201,39,208,232,142,104,206,173,102,206,2062
  29. 290 data208,58,141,107,206,76,136,204,173,106,206,208,1829
  30. 300 data23,173,103,206,240,7,165,253,166,254,76,41,1707
  31. 310 data203,160,1,177,253,170,136,177,253,76,41,203,1850
  32. 320 data165,214,201,2,144,35,201,3,176,4,165,211,1521
  33. 330 data240,27,169,21,160,206,32,30,171,76,128,204,1464
  34. 340 data32,178,205,32,163,205,240,6,32,71,205,76,1445
  35. 350 data69,204,238,103,206,169,222,160,205,32,30,171,1809
  36. 360 data169,204,162,5,32,205,189,169,19,162,13,160,1489
  37. 370 data4,141,119,2,142,120,2,142,121,2,142,122,1059
  38. 380 data2,132,198,96,32,49,205,169,227,160,205,32,1507
  39. 390 data30,171,169,10,160,206,32,30,171,169,112,160,1420
  40. 400 data206,32,30,171,169,13,32,210,255,76,210,255,1659
  41. 410 data165,43,166,44,133,63,134,64,160,0,177,63,1212
  42. 420 data133,65,200,177,63,133,66,162,255,160,3,142,1559
  43. 430 data100,206,140,101,206,238,100,206,238,101,206,172,2014
  44. 440 data101,206,177,63,201,128,144,40,56,233,127,170,1646
  45. 450 data160,255,202,240,8,200,185,158,160,16,250,48,1882
  46. 460 data245,200,185,158,160,48,14,174,100,206,221,112,1823
  47. 470 data206,208,17,238,100,206,76,197,204,56,233,128,1869
  48. 480 data174,100,206,221,112,206,240,21,165,65,166,66,1742
  49. 490 data208,162,173,107,206,208,51,32,49,205,169,253,1823
  50. 500 data160,205,76,111,204,236,99,206,144,167,238,107,1953
  51. 510 data206,173,107,206,201,2,176,16,160,2,177,63,1489
  52. 520 data141,110,206,200,177,63,141,111,206,76,228,204,1863
  53. 530 data32,49,205,169,239,160,205,76,111,204,32,178,1660
  54. 540 data205,173,111,206,174,110,206,32,205,189,76,160,1847
  55. 550 data203,169,0,174,99,206,141,109,206,232,157,112,1808
  56. 560 data206,32,166,205,240,96,32,163,205,240,91,32,1708
  57. 570 data77,205,76,66,205,166,212,208,36,201,128,144,1724
  58. 580 data32,56,233,127,170,160,255,202,240,8,200,185,1868
  59. 590 data158,160,16,250,48,245,200,185,158,160,48,6,1634
  60. 600 data32,117,205,76,102,205,56,233,128,174,109,206,1643
  61. 610 data240,9,238,99,206,174,99,206,157,112,206,32,1778
  62. 620 data210,255,174,104,206,240,23,201,39,240,19,201,1912
  63. 630 data48,144,12,201,58,144,11,201,65,144,4,201,1233
  64. 640 data91,144,3,141,105,206,96,32,171,205,162,0,1356
  65. 650 data161,251,96,230,251,208,2,230,252,96,169,20,1966
  66. 660 data141,106,206,174,99,206,32,210,255,202,16,250,1897
  67. 670 data173,102,206,240,236,160,1,177,251,208,230,169,2153
  68. 680 data58,76,210,255,32,68,229,160,0,132,198,132,1550
  69. 690 data199,132,212,132,216,96,13,83,89,83,0,13,1268
  70. 700 data13,18,69,82,82,79,82,32,73,78,0,13,621
  71. 710 data13,18,68,85,80,76,73,67,65,84,69,68,766
  72. 720 data0,13,13,18,85,78,68,69,70,73,78,69,634
  73. 730 data68,0,32,76,65,66,69,76,32,42,42,32,600
  74. 740 data0,13,13,18,76,73,78,69,32,84,79,79,614
  75. 750 data32,76,79,78,71,0,17,76,73,78,69,32,681
  76. 760 data82,69,70,69,82,69,78,67,69,83,32,67,837
  77. 770 data79,77,80,76,69,84,69,46,46,46,13,13,698
  78. 780 data82,69,77,79,86,69,32,69,88,73,83,84,891
  79. 790 data73,78,71,32,76,65,66,69,76,83,63,32,784
  80. 800 data40,89,47,78,41,32,0,0,0,0,0,0,327
  81.